home *** CD-ROM | disk | FTP | other *** search
/ Komputer for Alle 1999 #5 / 1999 CD 5 (black).iso / Delphi3 / install / data.z / PROXIES.INT < prev    next >
Encoding:
Text File  |  1997-08-05  |  570 b   |  17 lines
  1. unit Proxies;
  2.  
  3. interface
  4.  
  5. procedure CreateSubClass(Instance: TObject; const ClassName: string;
  6.   Ancestor: TClass);
  7. procedure DestroySubClass(Instance: TObject);
  8. procedure RenameSubClass(Instance: TObject; const ClassName: string);
  9. function GetSubClassInstance(Proxy: TClass): TObject;
  10. function CreateSubClassMethod(Instance: TObject;
  11.   const MethodName: string): Pointer;
  12. procedure RenameSubClassMethod(Instance: TObject; Method: Pointer;
  13.   const MethodName: string);
  14. procedure DestroySubClassMethod(Instance: TObject; Method: Pointer);
  15.  
  16. implementation
  17.